home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmfreec / _setup.1 / AHMTAboutDialog.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-09  |  3.3 KB  |  102 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTAboutDialog.pas' rev: 3.00
  6.  
  7. #ifndef AHMTAboutDialogHPP
  8. #define AHMTAboutDialogHPP
  9. #include <AHMFreeware.hpp>
  10. #include <Buttons.hpp>
  11. #include <StdCtrls.hpp>
  12. #include <ExtCtrls.hpp>
  13. #include <Forms.hpp>
  14. #include <Graphics.hpp>
  15. #include <Controls.hpp>
  16. #include <Classes.hpp>
  17. #include <Messages.hpp>
  18. #include <Windows.hpp>
  19. #include <SysUtils.hpp>
  20. #include <SysInit.hpp>
  21. #include <System.hpp>
  22.  
  23. //-- user supplied -----------------------------------------------------------
  24.  
  25. namespace Ahmtaboutdialog
  26. {
  27. //-- type declarations -------------------------------------------------------
  28. class DELPHICLASS TAHMAboutInfoForm;
  29. class PASCALIMPLEMENTATION TAHMAboutInfoForm : public Forms::TForm 
  30. {
  31.     typedef Forms::TForm inherited;
  32.     
  33. __published:
  34.     Extctrls::TPanel* Panel1;
  35.     Extctrls::TPanel* Panel2;
  36.     Extctrls::TPanel* Panel3;
  37.     Extctrls::TPanel* Panel4;
  38.     Extctrls::TPanel* Panel5;
  39.     Extctrls::TImage* Image1;
  40.     Stdctrls::TListBox* ListBox1;
  41.     Buttons::TBitBtn* BitBtn1;
  42.     Buttons::TBitBtn* BitBtn2;
  43.     Stdctrls::TLabel* Label1;
  44.     Stdctrls::TLabel* Label2;
  45.     void __fastcall FormShow(System::TObject* Sender);
  46.     void __fastcall BitBtn1Click(System::TObject* Sender);
  47.     void __fastcall BitBtn2Click(System::TObject* Sender);
  48.     
  49. public:
  50.     Classes::TStrings* xlitems;
  51.     Classes::TStrings* xlitems2;
  52. public:
  53.     /* TCustomForm.Create */ __fastcall virtual TAHMAboutInfoForm(Classes::TComponent* AOwner) : Forms::
  54.         TForm(AOwner) { }
  55.     /* TCustomForm.CreateNew */ __fastcall TAHMAboutInfoForm(Classes::TComponent* AOwner, int Dummy) : 
  56.         Forms::TForm(AOwner, Dummy) { }
  57.     /* TCustomForm.Destroy */ __fastcall virtual ~TAHMAboutInfoForm(void) { }
  58.     
  59. public:
  60.     /* TWinControl.CreateParented */ __fastcall TAHMAboutInfoForm(HWND ParentWindow) : Forms::TForm(ParentWindow
  61.         ) { }
  62.     
  63. };
  64.  
  65. class DELPHICLASS TAHMAboutDialog;
  66. class PASCALIMPLEMENTATION TAHMAboutDialog : public Classes::TComponent 
  67. {
  68.     typedef Classes::TComponent inherited;
  69.     
  70. private:
  71.     Ahmfreeware::TAHMAboutFreeStr FAbout;
  72.     Classes::TStrings* fact;
  73.     Classes::TStrings* fsys;
  74.     System::AnsiString fver;
  75.     Graphics::TFont* fFont;
  76.     void __fastcall sact(Classes::TStrings* value);
  77.     void __fastcall ssys(Classes::TStrings* value);
  78.     void __fastcall Setfont(Graphics::TFont* value);
  79.     
  80. public:
  81.     __fastcall virtual TAHMAboutDialog(Classes::TComponent* AOwner);
  82.     __fastcall virtual ~TAHMAboutDialog(void);
  83.     bool __fastcall Execute(void);
  84.     
  85. __published:
  86.     __property Ahmfreeware::TAHMAboutFreeStr About = {read=FAbout, write=FAbout};
  87.     __property System::AnsiString VersionDescription = {read=fver, write=fver};
  88.     __property Classes::TStrings* ActualInformation = {read=fact, write=sact};
  89.     __property Classes::TStrings* SystemInformation = {read=fsys, write=ssys};
  90.     __property Graphics::TFont* Fonts = {read=fFont, write=Setfont};
  91. };
  92.  
  93. //-- var, const, procedure ---------------------------------------------------
  94. extern PACKAGE TAHMAboutInfoForm* AboutInfoForm;
  95.  
  96. }    /* namespace Ahmtaboutdialog */
  97. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  98. using namespace Ahmtaboutdialog;
  99. #endif
  100. //-- end unit ----------------------------------------------------------------
  101. #endif    // AHMTAboutDialog
  102.